RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 


**FILEee1De#VR 
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RR RR 
RR RR 
RR RR 
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RR RR 
RR RR 
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4 
; Version: *v04-000' 


MEP R SRE E TTT TST SETS E TTT TTP Tercera citric iii ict iti tii ii iti iiiiiiiy 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
iw DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
it ALL RIGHTS RESERVED. 


* 
. 
® 
® 

:* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 

:* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 

:* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 

:* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 

:* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 

Se TRANSFERRED. . 

‘* ® 

:* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 

AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT ®* 

'* CORPORATION. * 
® 

. 

® 

® 

® 

® 


ie DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


lee 

FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 

ABSTRACT: 
Tables and definitions used for .VARIABLE, .IF, .IFNOT, .ELSE, and 
ENDIF. The tables all contain space for an extra entry, so that various 
other pieces of code need not continually check to see if there is an 
entry in the tables. 

ENVIRONMENT: Transportable BLISS 

AUTHOR: Rich Friday 

CREATION DATE: 1978 

MODIFIED BY: 
002 KAD00002 Keith Dawson 07-Mar-1983 


Globel edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS library. 


. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
. 
' 
: 
' 
. 
' 
. 
' 
. 
' 
. 
! 
. 
' 
. 
' 
. 
‘ 
. 
‘ 
: 


LITERAL 
ve_table_count = 5, !Number of tables that are vectors. 
vr_tab_size = Total BPVALs needed to save this information. 


'Space for tables that are vectors. 
(max vr_names + 1) * (vr_table_court) 
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<> 


+ 
‘Space for names 
(max_vr_names + 1) * CHSALLOCATION (max_vr_length); 


MACRO 


vrtflg def = 3 
. vector Cmax_vr_names + 1] ! TRUE flag. : 
vrfflg def = ; 
. VECTOR Cmax_vr_names + 1] ! FALSE flags. : 
vrbool_def = ; 
VECTOR Cmax_vr_names + 1) ! TRUE/FALSE setting. 
vrsrc def = 
VECTOR Cmax_vr_names + 1) ! How variable got defined. 
k ! 0 means /VARIANT, 1 means .VARIABLE. 
uring def = 
. ECTOR Cmax_vr_names + 1) ! Lengths of variable names. 
ven ! The variable names. 


ame def = 
BLOCKVECTOR Cmax_vr_names + 1 
echSallocation Tmax_vr_length)] 


: End of VR.REQ 


PMENT CORPORA 
AND PROPRIET 


ION 
RY 


0337 Fea Vso 


